home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 14 / CU Amiga Magazine's Super CD-ROM 14 (1997)(EMAP Images)(GB)(Track 1 of 3)[!][issue 1997-09].iso / CUCD / Programming / SecalDemo / Inc / libcalls / layers.inc < prev    next >
Encoding:
Text File  |  1997-06-11  |  5.3 KB  |  224 lines
  1. pattern InitLayers(_li) is
  2.     push a6;
  3.     a0:=_li;
  4.     a6:=LayersBase; jsr [a6-30];
  5.     pop a6;
  6. endp;                                                            # INITLAYERS
  7.  
  8. pattern CreateUpfrontLayer(_li,_bm,_x0,_y0,_x1,_y1,_flags,_bm2) is
  9.     push d2\d3\d4\a2\a6;
  10.     safe a0:=_li; a1:=_bm; d0.l:=_x0; d1.l:=_y0; d2.l:=_x1; d3.l:=_y1; d4.l:=_flags; a2:=_bm2;;
  11.     a6:=LayersBase; jsr [a6-36];
  12.     pop d2\d3\d4\a2\a6;
  13. endp;                                                            # CREATEUPFRONTLAYER
  14.  
  15. pattern CreateBehindLayer(_li,_bm,_x0,_y0,_x1,_y1,_flags,_bm2) is
  16.     push d2\d3\d4\a2\a6;
  17.     safe a0:=_li; a1:=_bm; d0.l:=_x0; d1.l:=_y0; d2.l:=_x1; d3.l:=_y1; d4.l:=_flags; a2:=_bm2;;
  18.     a6:=LayersBase; jsr [a6-42];
  19.     pop d2\d3\d4\a2\a6;
  20. endp;                                                            # CREATEBEHINDLAYER
  21.  
  22. pattern UpfrontLayer(_dummy,_layer) is
  23.     push a6;
  24.     safe a0:=_dummy; a1:=_layer;;
  25.     a6:=LayersBase; jsr [a6-48];
  26.     pop a6;
  27. endp;                                                            # UPFRONTLAYER
  28.  
  29. pattern BehindLayer(_dummy,_layer) is
  30.     push a6;
  31.     safe a0:=_dummy; a1:=_layer;;
  32.     a6:=LayersBase; jsr [a6-54];
  33.     pop a6;
  34. endp;                                                            # BEHINDLAYER
  35.  
  36. pattern MoveLayer(_dummy,_layer,_dx,_dy) is
  37.     push a6;
  38.     safe a0:=_dummy; a1:=_layer; d0.l:=_dx; d1.l:=_dy;;
  39.     a6:=LayersBase; jsr [a6-60];
  40.     pop a6;
  41. endp;                                                            # MOVELAYER
  42.  
  43. pattern SizeLayer(_dummy,_layer,_dx,_dy) is
  44.     push a6;
  45.     safe a0:=_dummy; a1:=_layer; d0.l:=_dx; d1.l:=_dy;;
  46.     a6:=LayersBase; jsr [a6-66];
  47.     pop a6;
  48. endp;                                                            # SIZELAYER
  49.  
  50. pattern ScrollLayer(_dummy,_layer,_dx,_dy) is
  51.     push a6;
  52.     safe a0:=_dummy; a1:=_layer; d0.l:=_dx; d1.l:=_dy;;
  53.     a6:=LayersBase; jsr [a6-72];
  54.     pop a6;
  55. endp;                                                            # SCROLLLAYER
  56.  
  57. pattern BeginUpdate(_l) is
  58.     push a6;
  59.     a0:=_l;
  60.     a6:=LayersBase; jsr [a6-78];
  61.     pop a6;
  62. endp;                                                            # BEGINUPDATE
  63.  
  64. pattern EndUpdate(_layer,_flag) is
  65.     push a6;
  66.     safe a0:=_layer; d0.l:=_flag;;
  67.     a6:=LayersBase; jsr [a6-84];
  68.     pop a6;
  69. endp;                                                            # ENDUPDATE
  70.  
  71. pattern DeleteLayer(_dummy,_layer) is
  72.     push a6;
  73.     safe a0:=_dummy; a1:=_layer;;
  74.     a6:=LayersBase; jsr [a6-90];
  75.     pop a6;
  76. endp;                                                            # DELETELAYER
  77.  
  78. pattern LockLayer(_dummy,_layer) is
  79.     push a6;
  80.     safe a0:=_dummy; a1:=_layer;;
  81.     a6:=LayersBase; jsr [a6-96];
  82.     pop a6;
  83. endp;                                                            # LOCKLAYER
  84.  
  85. pattern UnlockLayer(_layer) is
  86.     push a6;
  87.     a0:=_layer;
  88.     a6:=LayersBase; jsr [a6-102];
  89.     pop a6;
  90. endp;                                                            # UNLOCKLAYER
  91.  
  92. pattern LockLayers(_li) is
  93.     push a6;
  94.     a0:=_li;
  95.     a6:=LayersBase; jsr [a6-108];
  96.     pop a6;
  97. endp;                                                            # LOCKLAYERS
  98.  
  99. pattern UnlockLayers(_li) is
  100.     push a6;
  101.     a0:=_li;
  102.     a6:=LayersBase; jsr [a6-114];
  103.     pop a6;
  104. endp;                                                            # UNLOCKLAYERS
  105.  
  106. pattern LockLayerInfo(_li) is
  107.     push a6;
  108.     a0:=_li;
  109.     a6:=LayersBase; jsr [a6-120];
  110.     pop a6;
  111. endp;                                                            # LOCKLAYERINFO
  112.  
  113. pattern SwapBitsRastPortClipRect(_rp,_cr) is
  114.     push a6;
  115.     safe a0:=_rp; a1:=_cr;;
  116.     a6:=LayersBase; jsr [a6-126];
  117.     pop a6;
  118. endp;                                                            # SWAPBITSRASTPORTCLIPRECT
  119.  
  120. pattern WhichLayer(_li,_x,_y) is
  121.     push a6;
  122.     safe a0:=_li; d0.l:=_x; d1.l:=_y;;
  123.     a6:=LayersBase; jsr [a6-132];
  124.     pop a6;
  125. endp;                                                            # WHICHLAYER
  126.  
  127. pattern UnlockLayerInfo(_li) is
  128.     push a6;
  129.     a0:=_li;
  130.     a6:=LayersBase; jsr [a6-138];
  131.     pop a6;
  132. endp;                                                            # UNLOCKLAYERINFO
  133.  
  134. pattern NewLayerInfo is
  135.     push a6;
  136.     a6:=LayersBase; jsr [a6-144];
  137.     pop a6;
  138. endp;                                                            # NEWLAYERINFO
  139.  
  140. pattern DisposeLayerInfo(_li) is
  141.     push a6;
  142.     a0:=_li;
  143.     a6:=LayersBase; jsr [a6-150];
  144.     pop a6;
  145. endp;                                                            # DISPOSELAYERINFO
  146.  
  147. pattern FattenLayerInfo(_li) is
  148.     push a6;
  149.     a0:=_li;
  150.     a6:=LayersBase; jsr [a6-156];
  151.     pop a6;
  152. endp;                                                            # FATTENLAYERINFO
  153.  
  154. pattern ThinLayerInfo(_li) is
  155.     push a6;
  156.     a0:=_li;
  157.     a6:=LayersBase; jsr [a6-162];
  158.     pop a6;
  159. endp;                                                            # THINLAYERINFO
  160.  
  161. pattern MoveLayerInFrontOf(_layer_to_move,_other_layer) is
  162.     push a6;
  163.     safe a0:=_layer_to_move; a1:=_other_layer;;
  164.     a6:=LayersBase; jsr [a6-168];
  165.     pop a6;
  166. endp;                                                            # MOVELAYERINFRONTOF
  167.  
  168. pattern InstallClipRegion(_layer,_region) is
  169.     push a6;
  170.     safe a0:=_layer; a1:=_region;;
  171.     a6:=LayersBase; jsr [a6-174];
  172.     pop a6;
  173. endp;                                                            # INSTALLCLIPREGION
  174.  
  175. pattern MoveSizeLayer(_layer,_dx,_dy,_dw,_dh) is
  176.     push d2\d3\a6;
  177.     safe a0:=_layer; d0.l:=_dx; d1.l:=_dy; d2.l:=_dw; d3.l:=_dh;;
  178.     a6:=LayersBase; jsr [a6-180];
  179.     pop d2\d3\a6;
  180. endp;                                                            # MOVESIZELAYER
  181.  
  182. pattern CreateUpfrontHookLayer(_li,_bm,_x0,_y0,_x1,_y1,_flags,_hook,_bm2) is
  183.     push d2\d3\d4\a2\a3\a6;
  184.     safe a0:=_li; a1:=_bm; d0.l:=_x0; d1.l:=_y0; d2.l:=_x1; d3.l:=_y1; d4.l:=_flags; a3:=_hook; a2:=_bm2;;
  185.     a6:=LayersBase; jsr [a6-186];
  186.     pop d2\d3\d4\a2\a3\a6;
  187. endp;                                                            # CREATEUPFRONTHOOKLAYER
  188.  
  189. pattern CreateBehindHookLayer(_li,_bm,_x0,_y0,_x1,_y1,_flags,_hook,_bm2) is
  190.     push d2\d3\d4\a2\a3\a6;
  191.     safe a0:=_li; a1:=_bm; d0.l:=_x0; d1.l:=_y0; d2.l:=_x1; d3.l:=_y1; d4.l:=_flags; a3:=_hook; a2:=_bm2;;
  192.     a6:=LayersBase; jsr [a6-192];
  193.     pop d2\d3\d4\a2\a3\a6;
  194. endp;                                                            # CREATEBEHINDHOOKLAYER
  195.  
  196. pattern InstallLayerHook(_layer,_hook) is
  197.     push a6;
  198.     safe a0:=_layer; a1:=_hook;;
  199.     a6:=LayersBase; jsr [a6-198];
  200.     pop a6;
  201. endp;                                                            # INSTALLLAYERHOOK
  202.  
  203. pattern InstallLayerInfoHook(_li,_hook) is
  204.     push a6;
  205.     safe a0:=_li; a1:=_hook;;
  206.     a6:=LayersBase; jsr [a6-204];
  207.     pop a6;
  208. endp;                                                            # INSTALLLAYERINFOHOOK
  209.  
  210. pattern SortLayerCR(_layer,_dx,_dy) is
  211.     push a6;
  212.     safe a0:=_layer; d0.l:=_dx; d1.l:=_dy;;
  213.     a6:=LayersBase; jsr [a6-210];
  214.     pop a6;
  215. endp;                                                            # SORTLAYERCR
  216.  
  217. pattern DoHookClipRects(_hook,_rport,_rect) is
  218.     push a2\a6;
  219.     safe a0:=_hook; a1:=_rport; a2:=_rect;;
  220.     a6:=LayersBase; jsr [a6-216];
  221.     pop a2\a6;
  222. endp;                                                            # DOHOOKCLIPRECTS
  223.  
  224.